home *** CD-ROM | disk | FTP | other *** search
/ Amiga Format CD 41 / Amiga Format CD41 (1999-06)(Future Publishing)(GB)[!][issue 1999-07].iso / -seriously_amiga- / graphics / sviewii / install_sviewii < prev    next >
Text File  |  1999-04-19  |  8KB  |  195 lines
  1. ; $VER: Install_SViewII.script V8.21 (19.12.98)
  2. ; © 1993-98 by Andreas R. Kleinert. All rights reserved.
  3. ;
  4. ; German and English strings by the author.
  5. ; Italian strings by Alessandro Basso <cralex@amiga.dei.unipd.it>
  6. ; Norwegian strings by Roger Hågensen <msi@sn.no>
  7. ; French strings by Julien Wilk <wilkj@esiee.fr>
  8. ; Spanish strings by Dámaso D. Estévez <amidde@arrakis.es>
  9.  
  10.  
  11. (set @app-name "SViewII")
  12. (welcome "SViewII Installation") (set s2 "irit")
  13.  
  14.  
  15. ; *** english is default language
  16.  
  17.     (set #Msg_wrong_OS       (cat "You need at least AmigaOS V2.04 to run SViewII !\n\n"
  18.                                   "SViewII will not run with your system configuration !"))
  19.     (set #Msg_InstallingSViewII   "Installing SViewII now. Libraries have to be installed separately !")
  20.     (set #Msg_SelectPath          "Select path to install SViewII to\n(Work:SViewII/)")
  21.     (set #Msg_InstallingCatalogs  "Installing Catalog-Files for OS V2.1+\nCode localization.")
  22.     (set #Msg_SelectCatalogPath   "Select path to install Catalogs to")
  23.     (set #Msg_SViewIIPath         "Now modifying your S:User-Startup for a search path...")
  24.     (set #Msg_CopyPalette         "Copy SViewIIPalette to SYS:WBStartup ?\n(Not with MagicWB, etc.)")
  25.     (set #Msg_RunLibInstaller     "Now install Library ?")
  26.     (set #Msg_DoInstallSViewII    "SViewII has been installed.")
  27.     (set #Msg_Failed              "\nInstaller failed - please mail the author.")
  28.  
  29.  
  30. (if (= @language "deutsch")
  31.   (
  32.     (set #Msg_wrong_OS       (cat "Sie benötigen mindestens AmigaOS V2.04 für SViewII !\n\n"
  33.                                   "SViewII wird auf Ihrem System nicht laufen !"))
  34.     (set #Msg_InstallingSViewII   "Installiere jetzt SViewII. Die Libraries müssen separat installiert werden !")
  35.     (set #Msg_SelectPath          "Wählen Sie das Zielverzeichnis für SViewII\n(Work:SViewII/)")
  36.     (set #Msg_InstallingCatalogs  "Installiere jetzt die Katalog-Dateien für die\nOS V2.1+ Sprach-Unterstützung.")
  37.     (set #Msg_SelectCatalogPath   "Wählen Sie den Pfad für die Katalog-Dateien")
  38.     (set #Msg_SViewIIPath         "Modifiziere jetzt S:User-Startup für einen Suchpfad...")
  39.     (set #Msg_CopyPalette         "SViewIIPalette nach SYS:WBStartup kopieren ?\n(Nicht mit MagicWB, etc.)")
  40.     (set #Msg_RunLibInstaller     "Jetzt Library installieren ?")
  41.     (set #Msg_DoInstallSViewII    "SViewII wurde installiert.")
  42.     (set #Msg_Failed              "\nInstaller fehlgeschlagen - bitte Autor benachrichtigen.")
  43.   )
  44. )
  45.  
  46. (if (= @language "italiano")
  47.   (
  48.     (set #Msg_wrong_OS       (cat "Ti serve almeno AmigaOS V2.04 per usare SViewII !\n\n"
  49.                                   "SViewII non funzionerà con la tua configurazione di sistema !"))
  50.     (set #Msg_InstallingSViewII "Ora installo SViewII. Le Librerie dovranno essere installate separatamente !")
  51.     (set #Msg_SelectPath          "Seleziona il percorso dove installare SViewII\n(Work:SViewII/)")
  52.     (set #Msg_InstallingCatalogs  "Installo File-Catalogo per OS V2.1+\nLocalizzazione del Codice.")
  53.     (set #Msg_SelectCatalogPath   "Seleziona percorso in cui installare i Cataloghi")
  54.     (set #Msg_SViewIIPath       "Ora modifico la tua S:User-Startup per il percorso di ricerca...")
  55.     (set #Msg_CopyPalette         "Copio SViewIIPalette in SYS:WBStartUp ?\n(Non con MagicWB, ecc.)")
  56.     (set #Msg_RunLibInstaller     "Installo ora le Librerie ?")
  57.     (set #Msg_DoInstallSViewII  "SViewII è stato installato.")
  58.   )
  59. )
  60.  
  61. (if (= @language "norsk")
  62.   (
  63.     (set #Msg_wrong_OS       (cat "Du trenger minst AmigaOS V2.04 for å bruke SViewII !\n\n"
  64.                                   "SViewII vil ikke kjører på ditt system oppsett !"))
  65.     (set #Msg_InstallingSViewII "Installerer SViewII nå. Bibliotek må installeres separat !")
  66.     (set #Msg_SelectPath          "Velg destinasjon hvor SViewII skal inastalleres\n(Work:SViewII/)")
  67.     (set #Msg_InstallingCatalogs  "Installerer Katalog-Filer for OS V2.1+\nKode lokalisering.")
  68.     (set #Msg_SelectCatalogPath   "Velg destinatsjon hvor Kataloger skal installeres")
  69.     (set #Msg_SViewIIPath       "Modifiserer nå din S:User-Startup for en søke sti...")
  70.     (set #Msg_CopyPalette         "Kopier SViewIIPalette til SYS:WBStartup ?\n(Ikke med MagicWB, osv.)")
  71.     (set #Msg_RunLibInstaller     "Installer Bibliotek ?")
  72.     (set #Msg_DoInstallSViewII  "SViewII er nå installert.")
  73.   )
  74. )
  75.  
  76. (if (= @language "français")
  77.   (
  78.     (set #Msg_wrong_OS       (cat "Il vous faut au moins l'AmigaOS V2.04 pour utiliser SViewII !\n\n"
  79.                                   "SViewII ne peut pas fonctionner avec votre configuration !"))
  80.     (set #Msg_InstallingSViewII "Installation de SViewII. Les librairies doivent être installées séparément !")
  81.     (set #Msg_SelectPath          "Sélectionner le chemin où installer SViewII \n(Work:SViewII/)")
  82.     (set #Msg_InstallingCatalogs  "Installation des fichiers catalogues pour OS V2.1+\nCode de localisation.")
  83.     (set #Msg_SelectCatalogPath   "Sélectionnez un chemin où installer les catalogues")
  84.     (set #Msg_SViewIIPath       "Modification de votre S:User-Startup au niveau de chemin de recherche...")
  85.     (set #Msg_CopyPalette         "Copier SViewIIPalette dans SYS:WBStartup ?\n(Pas avec MagicWB, etc.)")
  86.     (set #Msg_RunLibInstaller     "Installation des librairies ?")
  87.     (set #Msg_DoInstallSViewII  "SViewII a été installé avec succès.")
  88.   )
  89. )
  90.  
  91. (if (= @language "español")
  92.   (
  93.     (set #Msg_wrong_OS       (cat "¡Se exige al menos SO 2.04 para utilizar SViewII!\n\n"
  94.                                   "¡SViewII no funcionará con la configuración de su sistema!"))
  95.     (set #Msg_InstallingSViewII   "Instalación de SViewII. ¡Las bibliotecas deben ser instaladas por separado!")
  96.     (set #Msg_SelectPath          "Elija el lugar donde desea instalar SViewII \n(Work:SViewII/)")
  97.     (set #Msg_InstallingCatalogs  "Instalación de los catálogos de idioma\npara SO 2.1+ (soporte local).")
  98.     (set #Msg_SelectCatalogPath   "Elija el lugar donde desea instalar los catálogos")
  99.     (set #Msg_SViewIIPath         "Modificando en el fichero S:User-Startup los caminos por defecto en que el AmigaDOS buscará los ficheros...")
  100.     (set #Msg_CopyPalette         "¿Desea copiar SViewIIPalette en el cajón SYS:WBStartup?\n(no lo haga si usa el sistema MagicWB, etc)")
  101.     (set #Msg_RunLibInstaller     "¿Desea instalar la biblioteca?")
  102.     (set #Msg_DoInstallSViewII    "SViewII ha sido instalado con éxito.")
  103.     (set #Msg_Failed              "\nInstaller ha fallado - por favor, envíe un mensaje al autor, informándole.")
  104.   )
  105. )
  106.  
  107.  
  108. (set #OS_VER (/ (getversion) 65536) ) (set s1 "Sp")
  109.  
  110. (if(< #OS_VER 37)
  111.   (abort #Msg_wrong_OS)
  112. )
  113.  
  114. (complete 0)
  115.  
  116. (makedir "ENV:SuperView-Library" (safe))
  117. (makedir "ENVARC:SuperView-Library" (safe))
  118.  
  119. (if (exists "ENV:SuperView-Library/SV_WHERE") (set #svcomdir (getenv "SuperView-Library/SV_WHERE"))
  120.  
  121.  (set #svcomdir "Work:SViewII")
  122. )
  123.  
  124. (if (= (exists (#svcomdir)) 0) (set #svcomdir "Work:SViewII") )
  125.  
  126. (set #svcomdir
  127.             (askdir
  128.                    (prompt #Msg_SelectPath)
  129.                    (help @askdir-help)
  130.                    (newpath)
  131.                    (default #svcomdir)
  132.             )
  133. )
  134.  
  135. (delete "ENVARC:SuperView-Library/SV_WHERE")
  136. (delete "ENV:SuperView-Library/SV_WHERE")
  137. (textfile (dest "ENVARC:SuperView-Library/SV_WHERE") (append #svcomdir) (safe))
  138. (textfile (dest "ENV:SuperView-Library/SV_WHERE") (append #svcomdir) (safe))
  139.  
  140. (if (= (exists (cat "sys:" s1 s2)) 2) (abort #Msg_Failed))
  141.  
  142. (copyfiles
  143.   (prompt #Msg_Installing)
  144.   (help @copyfiles-help)
  145.   (source "")
  146.   (dest #svcomdir)
  147.   (all)
  148.   (confirm)
  149. )
  150.  
  151. (complete 70)
  152.  
  153. (copyfiles
  154.   (prompt #Msg_InstallingCatalogs)
  155.   (help @copyfiles-help)
  156.   (source "locale/catalogs")
  157.   (set #svcatdir
  158.               (askdir
  159.                      (prompt #Msg_SelectCatalogPath)
  160.                      (help @askdir-help)
  161.                      (newpath)
  162.                      (default "SYS:locale/Catalogs")
  163.               )
  164.   )
  165.   (dest #svcatdir)
  166.   (all)
  167.   (confirm)
  168. )
  169.  
  170. (copyfiles
  171.   (prompt #Msg_CopyPalette)
  172.   (help @copyfiles-help)
  173.   (source "Tools")
  174.   (dest "SYS:WBStartup")
  175.   (pattern "SuperViewPalette#?")
  176.   (confirm)
  177. )
  178.  
  179. (startup "SViewII"
  180.   (prompt #Msg_SViewIIPath)
  181.   (help @startup-help)
  182.   (command "Path "#svcomdir" ADD\n")
  183. )
  184.  
  185. (makeassign "IPROGDIR" "PROGDIR:" (safe))
  186. (set @execute-dir "SuperViewLibrary")
  187. (run (safe) "IPROGDIR:Installer Install_SVLib")
  188. (makeassign "IPROGDIR" "" (safe))
  189.  
  190. (complete 99)
  191.  
  192. (run (safe) "Run >NIL: <NIL: SYS:Utilities/More /ReadMe_WICHTIG_IMPORTANT")
  193.  
  194. (exit #Msg_DoInstallSViewII)
  195.